﻿下着追加のススメ80％版（eraTW4.750）
他の人の考えた下着を見たいので書きます
コレクション表示可能とコレクション解禁条件の記述ルールが曖昧なので誰か加筆してもらえると嬉しいです。

------------------------------------------
◎下半身下着の追加方法
------------------------------------------
１，ERB\DIM.ERH内の数字を増やす

MAXPANTSは下半身下着の種類の最大値を入れる部分です。追加するだけ数を増やしましょう。
PANTS_TEMPも同じように増やしておきます。

#DIM CONST MAXPANTS = 数字

;パンツ一時保存
#DIM CHARADATA SAVEDATA PANTS_TEMP, 数字

　数字　を変えてください。




２，ERB\OBJ\CLASS\CLOTHES\CLOTHES_下半身下着_ずらし可能.ERBにデータを追加する

今回はショーツをサンプルに説明してきます。



---------------------ここから追加---------------------
@EXIST_下半身下着_ずらし可能19				←19を追加する番号に変えましょう
#LOCALSIZE 1
#LOCALSSIZE 1

@下半身下着_ずらし可能19(ARG, O_DATA, V_NAME)		←同じく19を追加する番号に変えましょう
#FUNCTION
#LOCALSIZE 1
#LOCALSSIZE 1
#DIMS O_DATA
#DIMS V_NAME
SELECTCASE O_DATA
CASE "名前"
	CALLF MAKE_STR(V_NAME, "ショーツ")		←表記名です
CASE "描写"
	CALLF MAKE_STR(V_NAME, "少女らしいキュートな")	←形容文です。この下着だと"少女らしいキュートなショーツ"とよく表記されます
CASE "透ける(前)"
	CALLF MAKE_INT(V_NAME, 1)			←下着前部分(陰部)が液体で透けるようになるかどうかです。オープンクロッチショーツなどは0に設定されています
CASE "透ける(後)"
	CALLF MAKE_INT(V_NAME, 1)			←下着後ろ部分(臀部)が液体で透けるようになるかどうかです。尻肉にかからないTバックなどは0に設定されています
CASE "はける"
	CALLF MAKE_INT(V_NAME, 1)			←その下着を身につける条件を書きます。下記参照。		
CASE "関連下着"
	CALLF MAKE_INT(V_NAME, 0)			←上半身の下着で特別紐付けしたい物がある場合に設定します。下記参照。

CASE "コレクション表示可能"
	CALLF MAKE_INT(V_NAME, 1)			←まだ持っていない下着を表示する際、表示するかどうかの条件を書きます。基本的にCASE"はける"のランダム要素をなくしたもので大丈夫のはずです。
CASE "コレクション解禁条件"				←この下着を履いてくるようになる条件を書きます。(加筆求む)
ENDSELECT
---------------------ここまで---------------------


※CASE "はける"設定

--------------------------------------------------
	SIF !RAND:(1 + (2 * 勝負下着判定(ARG)))
		CALLF MAKE_INT(V_NAME, 1)
--------------------------------------------------
勝負下着の際には着用する確率が減少する構文です。地味な下着はこのような設定が多いです

--------------------------------------------------
	IF TALENT:ARG:小悪魔 || TALENT:ARG:セフレ
	ELSEIF TALENT:ARG:幼稚 || TALENT:ARG:幼児／幼児退行 || TALENT:ARG:体型 < 0 || TALENT:ARG:無知
		CALLF MAKE_INT(V_NAME, 1)
	ENDIF
--------------------------------------------------
小悪魔、セフレがついておらず、幼稚などついてると着用するようになる構文です
幼い子供が履くようなパンツに使うといいでしょう

--------------------------------------------------
	IF !(TALENT:ARG:小悪魔 || TALENT:ARG:恋慕) && (TALENT:ARG:幼稚 || TALENT:ARG:幼児／幼児退行 || TALENT:ARG:体型 < 0 || TALENT:ARG:無知)
		CALLF MAKE_INT(V_NAME, 0)
	ELSEIF !RAND:(3 - TALENT:ARG:恋慕 - 勝負下着判定(ARG))
		CALLF MAKE_INT(V_NAME, 1)
	ENDIF
--------------------------------------------------
小悪魔または恋慕がついていて、幼稚などでなければ着用するようになる構文です。また恋慕がついている、勝負下着の日になると着用確率が上がるようになっています。
色っぽい下着などの条件のベースはこれをどうぞ

他にも細かい条件があるますが他の下着を参考にしてください。



※CASE "関連下着"設定

--------------------------------------------------
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("上半身下着１", "ばんそうこう"))
--------------------------------------------------
100％上半身の下着がばんそうこうになります

--------------------------------------------------
	SELECTCASE (RAND:2 + 勝負下着判定(ARG))
		CASE 2
			CALLF MAKE_INT(V_NAME, CLOTHES_ID("上半身下着１", "ベビードール"))
		CASE 1
			CALLF MAKE_INT(V_NAME, CLOTHES_ID("上半身下着１", "レースのブラ（白）"))
		CASEELSE
			CALLF MAKE_INT(V_NAME, 0)
	ENDSELECT
--------------------------------------------------
通常はレースのブラ（白）かランダムですが、勝負下着の日だとベビードールかレースのブラ（白）になります


----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------


------------------------------------------
◎上半身下着の追加方法
------------------------------------------
１，ERB\DIM.ERH内の数字を増やす

MAXBRAは上半身下着の種類の最大値を入れる部分です。追加するだけ数を増やしましょう。

#DIM CONST MAXBRA = 数字


　数字　を変えてください。


２，ERB\OBJ\CLASS\CLOTHES\CLOTHES_上半身下着_はだけ不可.ERBにデータを追加する

ブラジャーをサンプルに説明していきます

---------------------ここから追加---------------------
@EXIST_上半身下着_はだけ不可1					←1を追加する番号に変えましょう
#LOCALSIZE 1
#LOCALSSIZE 1

@上半身下着_はだけ不可1(ARG, O_DATA, V_NAME)			←同じく1を追加する番号に変えましょう
#FUNCTION
#LOCALSIZE 1
#LOCALSSIZE 1
#DIMS O_DATA
#DIMS V_NAME
SELECTCASE O_DATA
CASE "名前"
	CALLF MAKE_STR(V_NAME, "ブラジャー")			←表記名です
CASE "装備部位"
	CALLF MAKE_STR(V_NAME, "「上半身下着１」")
;旧装備処理との照会用、上半身下着１の1
CASE "つける"							←その下着を身につける条件を書きます。基本パンツの"つける"と同じように設定すればOKです
	IF TALENT:ARG:幼稚 || TALENT:ARG:幼児／幼児退行
		CALLF MAKE_INT(V_NAME, 0)
	ELSE
		CALLF MAKE_INT(V_NAME, 1)
	ENDIF
CASE "生地厚さ"							←その下着の厚さを設定します。数字が少ないほど少ない欲情Lvで乳首が浮きます
	CALLF MAKE_INT(V_NAME, 2)
ENDSELECT
---------------------ここまで---------------------


おまけ
ERB\イベント関連\BEFORETRAIN.ERBの衣装設定のループ内の最後に

	PRINTFORML %CALLNAME:LOCAL%[%BRANAME(EQUIP:LOCAL:上半身下着１, LOCAL)%][%PANTSNAME(EQUIP:LOCAL:下半身下着２, LOCAL)%]

と付け足せば一日が始まる前に着用している下着を確認できるのでデバッグ用に